(defprotocol Compass
  (direction [c])
  (left [c])
  (right [c]))
;; must support function and args
(def direction [:north :east :south :west])

;; define
(ref "Attr
